home *** CD-ROM | disk | FTP | other *** search
/ MACD 5 / MACD 5.bin / workbench / wb / czesc_2 / iconextras / rexx / makelink.rexx < prev    next >
OS/2 REXX Batch file  |  1995-01-13  |  388b  |  10 lines
  1. /* Make link */
  2. parse arg filename
  3. address command
  4. filename=strip(filename,'B','"')   /* remove quotes */
  5. filename=strip(filename)           /* remove spaces */
  6. filename=strip(filename,'T','/')   /* Finally, remove trailing slash */
  7. 'makelink' """"filename".link""" """"filename""" force" /* add quotes */
  8. 'copyicon' """"filename".info""" """"filename".link.info""" /* add quotes */
  9. exit
  10.